BORDER
------

          Although syntactically supported in the SET COLOR TO... command,
          Clipper does not actually set the border color to the specified
          color.  BORDER provides this functionality to standard color (CGA)
          and the new VGA monitors.  EGA standards do not allow for border
          color support but some EGA's will support them.

          This function can either accept a standard Clipper color string or
          an individual color string to set the border color.


     Format:

               border(aColor)


     Parameters:

               aColor....Character string variable or constant, non case
                         sensitive, which contains the color to use when
                         setting the border.  Must be the alpha
                         representation of the color, the numeric will be
                         rejected.  If the string is a standard Clipper color
                         command (eg. 'W/N,N/W,R,,N/W') the function will
                         locate the border color within the string position
                         as specified in the Clipper documentation.
                         Otherwise the function assumed the color for the
                         border is the string (eg. 'r').

                                  (valid colors)
                         black                         N
                         blue                          B
                         green                         G
                         cyan                          BG
                         red                           R
                         magenta                       RB
                         brown                         GR
                         white                         W

     Examples:

               1.   Set the colors, including the border, to a nice shade of
                    blue.

                    .
                    .
                    aColor = '+gr/b,b/gr,b,,n/w'
                    set color to &aColor
                    border(aColor)
                    .
                    .

     2.          Set the border to red without affecting anything else.

                    .
                    .
                    border('r')
                    .
                    .

     Returns:

               Nothing.


     Cautions:

               None.